﻿Public Class DefaultPacienteWeb
    Inherits System.Web.UI.Page

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load

        Dim imgFondo As Image = Page.Master.FindControl("Image2")

        If Not Page.IsPostBack Then
            imgFondo.Height = 300

            FG.culturaPaginas()



            Me.lblBienvenida.Font.Bold = True
            Me.lblBienvenida.Text = "Usuarios web"
            Me.lblUsuario.Text = "Bienvenido/a: " + MI_persona.PersLOgueada.Dev_ApellidoYnombre

            Me.lblFechaNac.Text = "Fecha de nacimiento: " + MI_persona.PersLOgueada.Dev_FechaNacimiento



        End If

    End Sub

End Class